home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Me-Mz / MusicLib.cpt / Music Library / background_2668.txt < prev    next >
Text File  |  1988-03-27  |  5KB  |  219 lines
  1. -- background: 2668 from stack: in
  2. -- bmap block id: 38710
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   get first word of field "Medium"
  9.   if it is "CD" then set icon of bkgnd button "Icon" to 2000
  10.   else if it is "LP" then set icon of bkgnd button "Icon" to 2001
  11.   else if it is "45" then set icon of bkgnd button "Icon" to 2003
  12.   else set icon of bkgnd button "Icon" to 2004
  13. end openCard
  14.  
  15.  
  16.  
  17. -- part 4 (field)
  18. -- low flags: 00
  19. -- high flags: 0002
  20. -- rect: left=95 top=67 right=86 bottom=391
  21. -- title width / last selected line: 0
  22. -- icon id / first selected line: 0 / 0
  23. -- text alignment: 0
  24. -- font id: 0
  25. -- text size: 12
  26. -- style flags: 0
  27. -- line height: 16
  28. -- part name: Title
  29.  
  30.  
  31. -- part 5 (field)
  32. -- low flags: 00
  33. -- high flags: 0002
  34. -- rect: left=95 top=89 right=108 bottom=391
  35. -- title width / last selected line: 0
  36. -- icon id / first selected line: 0 / 0
  37. -- text alignment: 0
  38. -- font id: 0
  39. -- text size: 12
  40. -- style flags: 0
  41. -- line height: 16
  42. -- part name: Artist
  43.  
  44.  
  45. -- part 6 (field)
  46. -- low flags: 00
  47. -- high flags: 0002
  48. -- rect: left=95 top=111 right=130 bottom=391
  49. -- title width / last selected line: 0
  50. -- icon id / first selected line: 0 / 0
  51. -- text alignment: 0
  52. -- font id: 0
  53. -- text size: 12
  54. -- style flags: 0
  55. -- line height: 16
  56. -- part name: Composer
  57.  
  58.  
  59. -- part 13 (button)
  60. -- low flags: 00
  61. -- high flags: 0000
  62. -- rect: left=440 top=310 right=334 bottom=465
  63. -- title width / last selected line: 0
  64. -- icon id / first selected line: 1013 / 1013
  65. -- text alignment: 1
  66. -- font id: 0
  67. -- text size: 12
  68. -- style flags: 0
  69. -- line height: 16
  70. -- part name: Next
  71. ----- HyperTalk script -----
  72. on mouseUp
  73.   go to next card
  74. end mouseUp
  75.  
  76.  
  77.  
  78. -- part 14 (button)
  79. -- low flags: 00
  80. -- high flags: 0000
  81. -- rect: left=405 top=310 right=334 bottom=428
  82. -- title width / last selected line: 0
  83. -- icon id / first selected line: 1014 / 1014
  84. -- text alignment: 1
  85. -- font id: 0
  86. -- text size: 12
  87. -- style flags: 0
  88. -- line height: 16
  89. -- part name: Prev
  90. ----- HyperTalk script -----
  91. on mouseUp
  92.   go to previous card
  93. end mouseUp
  94.  
  95.  
  96.  
  97. -- part 19 (button)
  98. -- low flags: 00
  99. -- high flags: 0000
  100. -- rect: left=104 top=290 right=335 bottom=145
  101. -- title width / last selected line: 0
  102. -- icon id / first selected line: 20186 / 20186
  103. -- text alignment: 1
  104. -- font id: 0
  105. -- text size: 12
  106. -- style flags: 0
  107. -- line height: 16
  108. -- part name: Sort
  109. ----- HyperTalk script -----
  110. on mouseUp
  111.   answer "Sort all cards of this stack according to:" with "Title" or "Artist" or "Cancel"
  112.   if it is "Title"
  113.   then sort by field "Title"
  114. else if it is "Artist"
  115. then sort by field "Artist"
  116. end mouseUp
  117.  
  118.  
  119.  
  120. -- part 20 (button)
  121. -- low flags: 00
  122. -- high flags: 0000
  123. -- rect: left=58 top=290 right=335 bottom=98
  124. -- title width / last selected line: 0
  125. -- icon id / first selected line: 32670 / 32670
  126. -- text alignment: 1
  127. -- font id: 0
  128. -- text size: 12
  129. -- style flags: 0
  130. -- line height: 16
  131. -- part name: Scan
  132. ----- HyperTalk script -----
  133. on mouseUp
  134.   show all cards
  135. end mouseUp
  136.  
  137.  
  138.  
  139. -- part 21 (button)
  140. -- low flags: 00
  141. -- high flags: 0000
  142. -- rect: left=12 top=290 right=335 bottom=52
  143. -- title width / last selected line: 0
  144. -- icon id / first selected line: 20098 / 20098
  145. -- text alignment: 1
  146. -- font id: 0
  147. -- text size: 12
  148. -- style flags: 0
  149. -- line height: 16
  150. -- part name: Home
  151. ----- HyperTalk script -----
  152. on mouseUp
  153.   visual effect iris close
  154.   go Home
  155. end mouseUp
  156.  
  157.  
  158.  
  159. -- part 22 (button)
  160. -- low flags: 00
  161. -- high flags: 0000
  162. -- rect: left=477 top=308 right=335 bottom=503
  163. -- title width / last selected line: 0
  164. -- icon id / first selected line: 1012 / 1012
  165. -- text alignment: 1
  166. -- font id: 0
  167. -- text size: 12
  168. -- style flags: 0
  169. -- line height: 16
  170. -- part name: Return
  171. ----- HyperTalk script -----
  172. on mouseUp
  173.   visual effect iris close
  174.   pop card
  175. end mouseUp
  176.  
  177.  
  178.  
  179. -- part 23 (field)
  180. -- low flags: 00
  181. -- high flags: 0002
  182. -- rect: left=95 top=133 right=230 bottom=391
  183. -- title width / last selected line: 0
  184. -- icon id / first selected line: 0 / 0
  185. -- text alignment: 0
  186. -- font id: 3
  187. -- text size: 12
  188. -- style flags: 0
  189. -- line height: 16
  190. -- part name: Info
  191.  
  192.  
  193. -- part 30 (field)
  194. -- low flags: 00
  195. -- high flags: 0000
  196. -- rect: left=408 top=111 right=130 bottom=478
  197. -- title width / last selected line: 0
  198. -- icon id / first selected line: 0 / 0
  199. -- text alignment: 1
  200. -- font id: 3
  201. -- text size: 12
  202. -- style flags: 256
  203. -- line height: 16
  204. -- part name: Medium
  205.  
  206.  
  207. -- part 32 (button)
  208. -- low flags: 00
  209. -- high flags: 0000
  210. -- rect: left=421 top=69 right=106 bottom=461
  211. -- title width / last selected line: 0
  212. -- icon id / first selected line: 2001 / 2001
  213. -- text alignment: 1
  214. -- font id: 0
  215. -- text size: 12
  216. -- style flags: 0
  217. -- line height: 16
  218. -- part name: Icon
  219.